home *** CD-ROM | disk | FTP | other *** search
/ Belgian Amiga Club - ADF Collection / BS1 part 65.zip / BS1 part 65 / Math Visin v2.1 disk 2.adf / DataTemplates / 2d_Array < prev    next >
Text File  |  1992-02-14  |  1KB  |  39 lines
  1. ! 2d_Array     two dimensional array with counts at top
  2. ! scaling is entered in this template in FirstLow .. SecondHigh
  3. !
  4. !-------------------------------- Prototype of data file --------------------
  5. ! rows columns
  6. ! data data data data data
  7. ! data data data data data
  8. !-------------------------------- Example of data file -----------------------
  9. ! 2 3   ! 2 x 3 elements
  10. ! 4.3 3.4 5.6 ! actual data
  11. ! 1.2 6.7 4.2
  12. !--------------------------------
  13.  
  14. Define Rows Integer
  15. Define Columns Integer
  16. Define FirstLow Real
  17. Define FirstHigh Real
  18. Define SecondLow Real
  19. Define SecondHigh Real
  20.  
  21. ! ----------------------------- Put scaling values here --------------------
  22. Assign FirstLow  0.0
  23. Assign FirstHigh 1.0
  24. Assign SecondLow 0.0
  25. Assign SecondHigh 1.0
  26. !---------------------------------------------------------------------------
  27.  
  28. Read Rows Columns
  29.  
  30. BeginStructure
  31.   DefArray Rows FirstLow FirstHigh
  32.     DefArray Columns SecondLow SecondHigh
  33.       DefDataType IEEE8
  34.     EndArray
  35.   EndArray
  36. EndStructure
  37.  
  38. RecurseRead
  39.